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Differences 
Version ‘v04-000' 


eerereeeerereeeerereeeererereeeekekeneeeeeneeaeaenereneeeeeeReeeeeeeeereeees 


COPYRIGHT (oD 1978, 01282 1982, 1984 BY 
DIGITAL FQui PA PORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESE nt Con 


:@ 

* ® 
-@ ® 
-@ ie 
-@ & 
:@ © 
;@ THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
is ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
fe COPIES, THEREOF MAY NOT GE PROVIDED OR OTHERUISE MADE AVAILABLE TO ANY s 
© OTHER PERSON, NO TITLE TO AND OUNERSHIP OF THE SOFTWARE TS MEREDY 
:@ TRANSFERRED. ‘ 
-@ e@ 
;@ THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE ®* 
;# AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT © 
:® CORPORATION. . 
-@ ® 
-@ * 
-@ te 
:@ ® 
-@ + 
sd ® 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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3e+ 


: FACILITY: DCL Differences command 
ABSTRACT: The DCL DIFFERENCES command compares the contents of 
two files. 


; ENVIRONMENT : VAX native, user mode 


Peter George 
Add IGNSV_HEADER and DIF $C_HEADERDEF. 


3 AUTHOR: Peter George, Benn Schreiber CREATION DATE: 1-August-1981 
MODIFIED BY: 

: V03-004 pwT0009 David Thiel 23-Dec-1981 
; Add DIFSV_MAXDIF and bins. OUTPUT. 

; Add DIFSC"MINLISIZ. 

; Add IGNSV~PRETTY, 

; v03-003 PCG0003 Peter George 14-0¢t-1981 
; Add DIFS$V_INIT. 

; v03-002 PCG0002 Peter George 23-Sep-1981 
; Add HEADCNT field to FDB. 

; v03-001 PCG0001 ter Geor 08-Sep-1981 


1 
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: File descriptor block (FDB) 


SSTRUCT FDB 
f Fuaaee L ; Record currently working with 
F FIRSTRECL ; Lowest number record in memory 
f LASTREC,L 3; Last record read 
F FIRSTDIF.L : First record of current difference 
f COMPIREC,L 3 pocera to start comparison at 
f COMPNREC,L 3 pecere reached in current comparison 
‘ EOFREC,L 3 nter to EOF recor 
F LASTRFA,L ; te record read before EOF 
f ECL 3 ber of records in file 
A FLAGS, W ; File flags 
CHANGEBAR 3 — . ar ee requested 
LINENUM 3 Prin ne numbe 
SEPARATED 3 vt BL output requested 
WOVE ; Secondary List required 
; » nee ; Character to use for change bar 
° 3; Spare 
fF HEADCNT, L 3; Number of header records skipped 
fF IFl.W 3 zovee IF] from FAB 
fF td 3; Spar 
F RABPTR,L : Pointer to RAB 
t NAMPTR,L 3; Pointer to NAM block 
F FILDESC, L ; Pointer to pering descriptor for file specification 
L SIZE 3; Size of an FOB 
E 


: Record descriptor block (RDB) 


SSTRUCT RDB 

f FLINK,L 3; Link to next ROB 

f NUMBER, L 3; Record number 

f FLAGS,.L 

Vv om 
I ED ; Ignore this record in all comparisons 
PERMANENT 3; Do not delete “ate ROB 
EOF ; EOF dummy reco 
EDITED 3; Record has been ‘edited 
MATCH 3; Matches a record in the other file 
MATCHONE 3; First match record after a difference 
> 

f RFA.W,3 ; RFA of record 

F LENGTH, W ; Length of record 


1 
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‘ TEXT,1,0 3; Start of record text 
t SIZE 


File type descriptor block 
Used to figure out comment characters given file type 
SSTRUCT FTDB 


f TYPTR,L ; Pointer to ASCIC file type string 
f COPIR, ; Pointer to ASCIC string of comment delims 
{ cies 8 ; Flags (each bit, when set, indicates first column only) 
E 
; Ignore character flags in dif$gl_ignore 
SSTRUCT IGN 
V <M 
BLNKLIN 3; Ignore blank Lines 
COMMENTS : Ignore comments 
FORMFEED ; Ignore form feeds 
TRAIBLNK : Ignore trailing blanks 
SPACING ; Ignore spacing 
ADER : Ignore header 
EXACT 3; Print source Line rather than editted Line 
apa ; Expand tabs, etc. in output Line 
E 


; Command parameter flags and other random definitions 


SSTRUCT DIF 


v C4 | 
~ ae ; Print differences in ASCII (default) 
Ps ex 
OCTAL 3 = tat 
COMDEL 3; Comment dol tatters were cosetited 
IGNORE 3; Characters to ignore ai specified 
MERGED 3; Print merged fot 'ti or fferences 
PARALLEL 3 rece t parstiel Ui differ neces 
SEPARATED 3 Lis ind contains a lis 
3 of *unaatthed — 
e 3; Create te 
WIDTH 3 /LINE_WIDTH = Svspecified 
TCH 3; /MATCR was speci ee 
WINDOW 3 wie was speci! ed 
LINENUM 3 4 om yes sper’ whee 
INIT 3 Sutout Ast ioe pe 
MAXDIF 3 /MAXIMUR_ nenees. was specified 
OuTPUT 3; /OUTPUT was speci 


o | 


j 
i 
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> 

C < 
BYTECNT, 65536 3; 512 * 128 = No tes to /+¥ with each GET_VM 
0 FHEADER, 3 3; Default value for “TeNRe E=(HEADER=n) 
DEFMATCH, 3 3; Default value for 
DEFMERGEO, 1 ; Default value for ime ReeD 
DEF PARALLEL 9 ; Default value for /PARALLEL 
DEFWINSIZ, é1 7483647 : Default value for 1W1NDOU Lax’ 7FRRFERE® ) 
ENTRYSI 3 r of bytes in es hex/octal entry 
LINENUA, ‘ 3 Size of Line number field 
MAXCOLM, 52 : nen ae quater 9 comment delimiters 
MAXFAOSIZ, 40 3 —- (fs ing ng size 
perk it ° ° 3 Default t t dth 
MAXL 3 » 132 5 5 de isti Hs width 
RIMES 71 3 Minimum listing width 

E 


: Format of a RFA 
; SSTRUCT RFA 
tual block number 


Vir 
Offset within block 
Size of the RFA 


VBN,L 
f OF FSET, w 
L SIZE 
E 
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